/*->Popovici Vuta*/

(deftemplate traseu
    (slot plecare)
    (slot destinatie)
    )

(assert (traseu (plecare nil)(destinatie nil)))

(defrule q
    (traseu (plecare nil)(destinatie nil))
    =>
    (printout t "Pe ce strada va situati? (CaleaBuziasului, Cheveresului, Olarilor, GrigoreAntipa, TraianSimu, TheodorPallady, MartirConstantinRadu, NicolaeD.Cocea, MateiMillo, Recoltei, Atomului, Electronici, Venus, Legumiculturi, CaleaUrseni, EmilRacovita, Euripide, Neajlov, NicolaeStoica, DimitrieDinicu, PavelStoica, IuliuPodlinny,  Jupiter, MaresalConstantinPrezan, Rapsodiei, Norma, Mures, Rigolette, Tosca, GavrilMusicescu, VasileMioc, EduardBenes, EduardPamfil, Traviata, Aida, NicolaeIvan, JoseSilva, CaleaMartirilor1989, GeneralGeorgePomut, GeneralGeorgeStavrescu, AnisoaraOldeanu, EmilCioran, MihailSadoveanu, PiusBranzeu, Gospodarilor, LouisTurcanu, AristideBriand, ClaudeDebussy, EdgarQuinet, Gospodarilor, JulesMichelet, MaximilianFremon, Apicultorilor, Muncitorilor, Anul1848, Diminetii, MartirIoanCiordas, PetrovPavlov, Vanatorilor, WiliamShakesphare, Progresu, Alunis, JeanMonet, Oedip, Calatorilor, Fedra, Prutu, Berzei, LudwigVonYbl, Magura, MartirAlexFercheiSuteu, Privala, MartirJuvenaru, Drubeta, Arcidava, UlpiaTraiana, TraianVuia, VictorValcovici, IoachimMiloia, VictorHugo, DobrogeanuGherea, EmileZola, GalileoGalilei, Herculane, Margaritarilor, ConstantinDobrogeanuGherea, Izlaz, ArhitectVictorVlad, Duliu Mercu, Steaua, Florilor, Segetei, Bujorilor, MartirHermanSpofer, MagisterMuresanTitus, Secerii, Ceferistilor, JeanPaulMarat, BarbuLautaru, Eternitatii, EmilZola, Barsei, Ipatescu, Chisodei, Cercului, MartirPetruHategan, Fratelia, Harniciei, Viitorului, Zarand, GheorgheRanetti, Hebe, Letea, Ariadna, Iris, Mangiuga, Meziad, MaresalAlexandruAverescu, BulevardulIndustriei, DoctorIosifBulbuca, Orion, MartirVasileBalmus, Oglinzilor, Sirius, Astrilor, DrIoanMuresan, MartirMariusCiopec, MartirIoanStanciu, MartirAngelaSava, MartirStefanMaris, MartirNicoaraElena, Pepinierei, BulevarduLiviuRebreanu, Versului, Azuga, Crivaia, CanaluBega, Parang, MartirNicolaeLacatusu, Delinesti, Ludus, TataOancea, TraianDemetrescu, Albastrelelor, JulesVernes, GeneralMagheru, JokaiMoor, MartirTanaseIoan, VeleaTincuNicolae, MartirCornelPopescu, RepinIlia, Parcului, Rotunda, Cocorilor, EmilGarleanu, CalistratHogas, Gradinarilor, Bistritei, ColoniaRadio, RudolfWalter, Campului, EftaBotoca, IonLucaBanateanu, Aviatorilor, Energiei, Zefirului, PoianaMarului, MunteleMic, Baia, Sovata, Salaj, SatuMare, Apateu, Virgiliu, Fermitatii, Brigadierilor, Sucului, Torac, Batania, Herodot, Levantica, Pindului ConstantinMiluLerca, Caprioarei, GrigorePlopii, DumbravaRosie, Bitolia, Tiblesul, Tigrului, Noua, VasileCarlova, Melodiei, PetrovCermena, Soarelui, Lunei, IoanLotreanu, AlexandraIndries, EmiliaPuhalloLungu, IoanIncentiuClainMicu, CezarBoliac, IosifVulcan, MoiseNicoara, FrederichChopin, Cerna, Sudului, Constructorilor, StefanCelMare, AndreiSaguna, Iepurului, StefanOctavianIosif, Scolii, IuliuGrozavescu, Timocului, EcaterinaTeodoroiu, PaulIorgovici, Arcului, Morarilor, BarbuStef.Delavrancea, IonCreanga, PetreIspirescu, TiberiuTimisanPop, CostacheNegruzzi, Dacia, Zavoi, AntonPan, Comanesti, BabaDochia, PestalotzziI.I., BulevarduCorneliuCopos, Slatna, Bulevardu3august1919, SfetcaPetru, ProfesorDioniesLinta, Abrud, IonMihalache, TituMaiorescu, Prof.A.PaunescuPodean, Str1Decembrie, WiliamKonradRontgen, Carpati, Cerna, Somes, SurorileMartirCaceu, Crisului, Carturarilor, Stejaru, Cuvin, CornealiaSalceanu, Delfinului, BarbuIscovescu, Ofcea, Aurelianus, Socrates, CharlesDarwing, Daliei,  Caras, VirgilBirou, LascarCatargiu, Mehadia, AlexandruValdaVoievod, Miorita, Milcov, Varadia, Leului, Lautarilor, Gloriei, BulevarduEroiilorDeLaTisa, Johannguttenberg, SatuNou, Deliblata, IonVidu, MihaiJora, Diana, Minerva, Valcea, Constanta, Retezat, Feleacu, AnghelSaligny, Craiova, Cluj, Aries, Apelor, MartirJanosParis, JozefAtila, NicolaeIliescu, DositeiObradovici, Cosminului, Salcamilor, Vadeasa, IovanSterjaPopovici, Panselelor, AnaIspatescu, Memorandului, Cozia, Eneas, Feldioara, Severin, AronPumnul, IonTitel, EvilaCelebi, AurelCandea, ProtopopGeorgePopovici, PetruRamneantu, MitropolituVarlaam, BelaBartok, Arges, Putna, PlautiusAndronescu, TraianLalescu, IoanCurea, AlexandruOdobescu, Ghirlandei, Izvorului, Independentei, Glad, VadulCalugareni, RusuSirianu, AlexandruMacedonski, GheorgheDoja, VirgilOnitiu, SfantaRozaria, Romulus, Remus, VirgilMadgeanu, BarbuFilaret, Brasov, GeneralHenriBerthold, TimotelCipariu, Motilor, TreboriuLaurian, IonHeliadeRadulescu, ConstantinNoica, CostelGroisoreanu, NicolaeLabis, OctavianGoga, Corbului, CiprianPorumbescu, MironCostin, ZugravNedelcu, AdyEndre, EmanoilGojdu, IonGhica, IancuVacarescu, IosezfPreyer, Mangalia, Crizantemelor, Platanilor, AlexandruVlahuta, CapitanDamsescu, Prahova, BudaiDeleanu, Banatului, GheorgheSincai, VasileLupu, Vulturilor, IonBarac, Posada, Clabucet, Bran, Vlasiei, Transilvaniei, Dreptatea, Lacului, Stiintei, Teatrului, Frunzei, Filateliei, Fructelor, Gradinii, PaulConstantinescu, Rahovei, Maramures, Rachitei, BabaNovac, Ardealului, IosephGabriel, IonRomanu, ConstantinSilvestri, Muncii, MartirGoguOpre, PavelDan, CornealiuBaba, Macarie, MirceaPopa, Pacii, OctavBancila, GeorgeGeorgescu, Lamaitei, EugenCutreanu, IuliaSimu, NicolaeAndreescu, Sulina, DanielConstantin, NicolaeFilimon, AntonBalcabasa, IoanSlavici, Podgoriei, NicolaePaganini, OvidiuCotrus, WilhelmTell, Polona)" crlf)
    (bind ?r (read))
    (assert (traseu (plecare ?r)(destinatie nil)))
)



(defrule r1
  (traseu (plecare CaleaBuziasului)(destinatie nil))
 =>
(printout t "Pe care strada doriti sa ajungeti? (Cheveresului, Olarilor, GrigoreAntipa, TraianSimu, TheodorPallady, MartirConstantinRadu, NicolaeD.Cocea, MateiMillo, Recoltei, Atomului, Electronici, Venus, Legumiculturi, CaleaUrseni, EmilRacovita, euripide, Neajlov, NicolaeStoica, DimitrieDinicu, PavelStoica, IuliuPodlinny,  Jupiter, MaresalConstantinPrezan, Rapsodiei, Norma, Mures, Rigolette, Tosca, GavrilMusicescu, VasileMioc, EduardBenes, EduardPamfil, Traviata, Aida, NicolaeIvan, JoseSilva, CaleaMartirilor1989, GeneralGeorgePomut, GeneralGeorgeStavrescu, AnisoaraOldeanu, EmilCioran, MihailSadoveanu, PiusBranzeu, Gospodarilor, LouisTurcanu, AristideBriand, ClaudeDebussy, EdgarQuinet, Gospodarilor, JulesMichelet, MaximilianFremon, Apicultorilor, Muncitorilor, Anul1848, Diminetii, MartirIoanCiordas, PetrovPavlov, Vanatorilor, WiliamShakesphare, Progresu, Alunis, JeanMonet, Oedip, Calatorilor, Fedra, Prutu, Berzei, LudwigVonYbl, Magura, MartirAlexFercheiSuteu, Privala, MartirJuvenaru, Drubeta, Arcidava, UlpiaTraiana, TraianVuia, VictorValcovici, IoachimMiloia, VictorHugo, DobrogeanuGherea, EmileZola, GalileoGalilei, Herculane, Margaritarilor, ConstantinDobrogeanuGherea, Izlaz, ArhitectVictorVlad, Duliu Mercu, Steaua, Florilor, Segetei, Bujorilor, MartirHermanSpofer, MagisterMuresanTitus, Secerii, Ceferistilor, JeanPaulMarat, BarbuLautaru, Eternitatii, EmilZola, Barsei, Ipatescu, Chisodei, Cercului, MartirPetruHategan, Fratelia, Harniciei, Viitorului, Zarand, GheorgheRanetti, Hebe, Letea, Ariadna, Iris, Mangiuga, Meziad, MaresalAlexandruAverescu, BulevardulIndustriei, DoctorIosifBulbuca, Orion, MartirVasileBalmus, Oglinzilor, Sirius, Astrilor, DrIoanMuresan, MartirMariusCiopec, MartirIoanStanciu, MartirAngelaSava, MartirStefanMaris, MartirNicoaraElena, Pepinierei, BulevarduLiviuRebreanu, Versului, Azuga, Crivaia, CanaluBega, Parang, MartirNicolaeLacatusu, Delinesti, Ludus, TataOancea, TraianDemetrescu, Albastrelelor, JulesVernes, GeneralMagheru, JokaiMoor, MartirTanaseIoan, VeleaTincuNicolae, MartirCornelPopescu, RepinIlia, Parcului, Rotunda, Cocorilor, EmilGarleanu, CalistratHogas, Gradinarilor, Bistritei, ColoniaRadio, RudolfWalter, Campului, EftaBotoca, IonLucaBanateanu, Aviatorilor, Energiei, Zefirului, PoianaMarului, MunteleMic, Baia, Sovata, Salaj, SatuMare, Apateu, Virgiliu, Fermitatii, Brigadierilor, Sucului, Torac, Batania, Herodot, Levantica, Pindului ConstantinMiluLerca, Caprioarei, GrigorePlopii, DumbravaRosie, Bitolia, Tiblesul, Tigrului, Noua, VasileCarlova, Melodiei, PetrovCermena, Soarelui, Lunei, IoanLotreanu, AlexandraIndries, EmiliaPuhalloLungu, IoanIncentiuClainMicu, CezarBoliac, IosifVulcan, MoiseNicoara, FrederichChopin, Cerna, Sudului, Constructorilor, StefanCelMare, AndreiSaguna, Iepurului, StefanOctavianIosif, Scolii, IuliuGrozavescu, Timocului, EcaterinaTeodoroiu, PaulIorgovici, Arcului, Morarilor, BarbuStef.Delavrancea, IonCreanga, PetreIspirescu, TiberiuTimisanPop, CostacheNegruzzi, Dacia, Zavoi, AntonPan, Comanesti, BabaDochia, PestalotzziI.I., BulevarduCorneliuCopos, Slatna, Bulevardu3august1919, SfetcaPetru, ProfesorDioniesLinta, Abrud, IonMihalache, TituMaiorescu, Prof.A.PaunescuPodean, Str1Decembrie, WiliamKonradRontgen, Carpati, Cerna, Somes, SurorileMartirCaceu, Crisului, Carturarilor, Stejaru, Cuvin, CornealiaSalceanu, Delfinului, BarbuIscovescu, Ofcea, Aurelianus, Socrates, CharlesDarwing, Daliei,  Caras, VirgilBirou, LascarCatargiu, Mehadia, AlexandruValdaVoievod, Miorita, Milcov, Varadia, Leului, Lautarilor, Gloriei, BulevarduEroiilorDeLaTisa, Johannguttenberg, SatuNou, Deliblata, IonVidu, MihaiJora, Diana, Minerva, Valcea, Constanta, Retezat, Feleacu, AnghelSaligny, Craiova, Cluj, Aries, Apelor, MartirJanosParis, JozefAtila, NicolaeIliescu, DositeiObradovici, Cosminului, Salcamilor, Vadeasa, IovanSterjaPopovici, Panselelor, AnaIspatescu, Memorandului, Cozia, Eneas, Feldioara, Severin, AronPumnul, IonTitel, EvilaCelebi, AurelCandea, ProtopopGeorgePopovici, PetruRamneantu, MitropolituVarlaam, BelaBartok, Arges, Putna, PlautiusAndronescu, TraianLalescu, IoanCurea, AlexandruOdobescu, Ghirlandei, Izvorului, Independentei, Glad, VadulCalugareni, RusuSirianu, AlexandruMacedonski, GheorgheDoja, VirgilOnitiu, SfantaRozaria, Romulus, Remus, VirgilMadgeanu, BarbuFilaret, Brasov, GeneralHenriBerthold, TimotelCipariu, Motilor, TreboriuLaurian, IonHeliadeRadulescu, ConstantinNoica, CostelGroisoreanu, NicolaeLabis, OctavianGoga, Corbului, CiprianPorumbescu, MironCostin, ZugravNedelcu, AdyEndre, EmanoilGojdu, IonGhica, IancuVacarescu, IosezfPreyer, Mangalia, Crizantemelor, Platanilor, AlexandruVlahuta, CapitanDamsescu, Prahova, BudaiDeleanu, Banatului, GheorgheSincai, VasileLupu, Vulturilor, IonBarac, Posada, Clabucet, Bran, Vlasiei, Transilvaniei, Dreptatea, Lacului, Stiintei, Teatrului, Frunzei, Filateliei, Fructelor, Gradinii, PaulConstantinescu, Rahovei, Maramures, Rachitei, BabaNovac, Ardealului, IosephGabriel, IonRomanu, ConstantinSilvestri, Muncii, MartirGoguOpre, PavelDan, CornealiuBaba, Macarie, MirceaPopa, Pacii, OctavBancila, GeorgeGeorgescu, Lamaitei, EugenCutreanu, IuliaSimu, NicolaeAndreescu, Sulina, DanielConstantin, NicolaeFilimon, AntonBalcabasa, IoanSlavici, Podgoriei, NicolaePaganini, OvidiuCotrus, WilhelmTell, Polona)" crlf)
    (bind ?r (read))
    (assert (traseu (plecare CaleaBuziasului)(destinatie ?r)))
    )
(defrule traseu11
    (traseu (plecare CaleaBuziasului)(destinatie Cheveresului))
    =>
    (printout t  "Traseul ce trebuie urmat pentru a ajunge la destinatie este:CaleaBuziasului - Strada Cheveresului(cele doua strazi sunt invecinate) !"crlf)
    )
(defrule traseu12
    (traseu (plecare CaleaBuziasului)(destinatie Olarilor))
    =>
    (printout t  "Traseul ce trebuie urmat pentru a ajunge la destinatie este:CaleaBuziasului - Strada Cheveresului - Strada Olarilor   sau  Calea Buziasului - Strada Martir Constantin Radu - Strada Olarilor!"crlf)
    )
(defrule traseu13
    (traseu (plecare CaleaBuziasului)(destinatie GrigoreAntipa))
    =>
    (printout t  "Traseul ce trebuie urmat pentru a ajunge la destinatie este:CaleaBuziasului - Strada Grigore Antipa(cele doua strazi sunt invecinate) !"crlf)
    )
(defrule traseu14
    (traseu (plecare CaleaBuziasului)(destinatie TraianSimu))
    =>
    (printout t  "Traseul ce trebuie urmat pentru a ajunge la destinatie este:CaleaBuziasului - Strada Traian Simu(cele doua strazi sunt invecinate) !"crlf)
    )
(defrule traseu15
    (traseu (plecare CaleaBuziasului)(destinatie TheodorPallady))
    =>
    (printout t  "Traseul ce trebuie urmat pentru a ajunge la destinatie este:CaleaBuziasului - Strada Theodor Pallady(cele doua strazi sunt invecinate) !"crlf)
    )
(defrule traseu16
    (traseu (plecare CaleaBuziasului)(destinatie MartirConstantinRadu))
    =>
    (printout t  "Traseul ce trebuie urmat pentru a ajunge la destinatie este:CaleaBuziasului - Strada Martir Constantin Radu(cele doua strazi sunt invecinate) !"crlf)
    )
(defrule traseu17
    (traseu (plecare CaleaBuziasului)(destinatie NicolaeD.Cocea))
    =>
    (printout t  "Traseul ce trebuie urmat pentru a ajunge la destinatie este:CaleaBuziasului - Strada Matei Millor - Strada Nicolae D.Cocea  sau  CaleaBuziasului - Strada Martir Constantin Radu - Strada Nicolae D.Cocea  sau  CaleaBuziasului - Strada Theodor Pallady - Strada Nicolae D.Cocea  sau  CaleaBuziasului - Strada Traian Simu - Strada Nicolae D.Cocea!"crlf)
    )
(defrule traseu18
    (traseu (plecare CaleaBuziasului)(destinatie MateiMillo))
    =>
    (printout t  "Traseul ce trebuie urmat pentru a ajunge la destinatie este:CaleaBuziasului - Strada Matei Millo(cele doua strazi sunt invecinate) !"crlf)
    )
(defrule traseu19
    (traseu (plecare CaleaBuziasului)(destinatie Recoltei))
    =>
    (printout t  "Traseul ce trebuie urmat pentru a ajunge la destinatie este:CaleaBuziasului - Strada Matei Millo - Strada Recoltei !"crlf)
    )
(defrule traseu111
    (traseu (plecare CaleaBuziasului)(destinatie Atomului))
    =>
    (printout t  "Traseul ce trebuie urmat pentru a ajunge la destinatie este:CaleaBuziasului - Intrarea Neptun - Strada Atomului !"crlf)
    )
(defrule traseu112
    (traseu (plecare CaleaBuziasului)(destinatie Electronici))
    =>
    (printout t  "Traseul ce trebuie urmat pentru a ajunge la destinatie este:CaleaBuziasului - Intrarea Neptun - Strada Atomului - Intrare Saturn - Strada Electronicii  sau  CaleaBuziasului - Strada Venus (se face stanga in sensul giratoriu) - Intrare Venus - Strada Atomului!"crlf)
    )
(defrule traseu113
    (traseu (plecare CaleaBuziasului)(destinatie Venus))
    =>
    (printout t  "Traseul ce trebuie urmat pentru a ajunge la destinatie este:CaleaBuziasului - Strada Venus (se face stanga in sensul giratoriu) !"crlf)
    )
(defrule traseu114
    (traseu (plecare CaleaBuziasului)(destinatie Legumiculturi))
    =>
    (printout t  "Traseul ce trebuie urmat pentru a ajunge la destinatie este:CaleaBuziasului - Strada Matei Millo - Strada Recoltei - Strada Legumiculturii !"crlf)
    )
(defrule traseu115
    (traseu (plecare CaleaBuziasului)(destinatie CaleaUrseni))
    =>
    (printout t  "Traseul ce trebuie urmat pentru a ajunge la destinatie este:CaleaBuziasului - Strada Martir Constantin Radu - Strada Iuliu Podlinny - Calea Urseni !"crlf)
    ) 
(defrule traseu116
    (traseu (plecare CaleaBuziasului)(destinatie EmilRacovita))
    =>
    (printout t  "Traseul ce trebuie urmat pentru a ajunge la destinatie este:CaleaBuziasului - Strada Matei Millo - Strada Emil Racovita !"crlf)
    )
(defrule traseu117
    (traseu (plecare CaleaBuziasului)(destinatie Euripide))
    =>
    (printout t  "Traseul ce trebuie urmat pentru a ajunge la destinatie este:CaleaBuziasului - Strada Matei Millo - Strada Euripide !"crlf)
    )
(defrule traseu118
    (traseu (plecare CaleaBuziasului)(destinatie Neajlov))
    =>
    (printout t  "Traseul ce trebuie urmat pentru a ajunge la destinatie este:CaleaBuziasului - Strada Martir Constantin Radu - Strada Iuliu Podlinny - Strada Neajlov !"crlf)
    )
(defrule traseu119
    (traseu (plecare CaleaBuziasului)(destinatie NicolaeStoica))
    =>
    (printout t  "Traseul ce trebuie urmat pentru a ajunge la destinatie este:CaleaBuziasului - Strada Martir Constantin Radu - Strada Iuliu Podlinny - Strada Nicolae Stoica !"crlf)
    )
(defrule traseu121
    (traseu (plecare CaleaBuziasului)(destinatie DimitrieDinicu))
    =>
    (printout t  "Traseul ce trebuie urmat pentru a ajunge la destinatie este:CaleaBuziasului - Strada Matei Millo - Strada Dimitrie Dinicu !"crlf)
    )
(defrule traseu122
    (traseu (plecare CaleaBuziasului)(destinatie PavelStoica))
    =>
    (printout t  "Traseul ce trebuie urmat pentru a ajunge la destinatie este:CaleaBuziasului - Strada Matei Millo - Strada Dimitrie Dinicu - Strada Pavel Stoica !"crlf)
    )
(defrule traseu123
    (traseu (plecare CaleaBuziasului)(destinatie IuliuPodlinny))
    =>
    (printout t  "Traseul ce trebuie urmat pentru a ajunge la destinatie este:CaleaBuziasului - Strada Martir Constantin Radu - Strada Iuliu Podlinny !"crlf)
    )
(defrule traseu124
    (traseu (plecare CaleaBuziasului)(destinatie Jupiter))
    =>
    (printout t  "Traseul ce trebuie urmat pentru a ajunge la destinatie este:CaleaBuziasului - Strada Matei Millo - Strada Recoltei - Strada Legumiculturii - Strada Jupiter !"crlf)
    )
(defrule traseu125
    (traseu (plecare CaleaBuziasului)(destinatie BulevarduLiviuRebreanu))
    =>
    (printout t  "Traseul ce trebuie urmat pentru a ajunge la destinatie este:CaleaBuziasului - Bulevardul Dr.Iosif Bulbuca - Bulevardul Liviu Rebreanu !"crlf)
    )
(defrule traseu126
    (traseu (plecare CaleaBuziasului)(destinatie PoianaMarului))
    =>
    (printout t  "Traseul ce trebuie urmat pentru a ajunge la destinatie este:CaleaBuziasului - Calea Stan Vidrighin - Strada Constructorilor - Bulevardul Industriei - Calea Mosnitei - Strada Satu Mare - Strada Poiana Marului!"crlf)
    )
(defrule traseu127
    (traseu (plecare CaleaBuziasului)(destinatie Aida))
    =>
    (printout t  "Traseul ce trebuie urmat pentru a ajunge la destinatie este: .. !"crlf)
    )
(defrule traseu128
    (traseu (plecare CaleaBuziasului)(destinatie Mures))
    =>
    (printout t  "Traseul ce trebuie urmat pentru a ajunge la destinatie este:... !"crlf)
    )



(defrule r2
    (traseu (plecare GheorgheDoja)(destinatie nil))
    =>
    (printout t "Pe care strada doriti sa ajungeti? (CaleaBuziasului, Cheveresului, Olarilor, GrigoreAntipa, TraianSimu, TheodorPallady, MartirConstantinRadu, NicolaeD.Cocea, MateiMillo, Recoltei, Atomului, Electronici, Venus, Legumiculturi, CaleaUrseni, EmilRacovita, Euripide, Neajlov, NicolaeStoica, DimitrieDinicu, PavelStoica, IuliuPodlinny,  Jupiter, MaresalConstantinPrezan, Rapsodiei, Norma, Mures, Rigolette, Tosca, GavrilMusicescu, VasileMioc, EduardBenes, EduardPamfil, Traviata, Aida, NicolaeIvan, JoseSilva, CaleaMartirilor1989, GeneralGeorgePomut, GeneralGeorgeStavrescu, AnisoaraOldeanu, EmilCioran, MihailSadoveanu, PiusBranzeu, Gospodarilor, LouisTurcanu, AristideBriand, ClaudeDebussy, EdgarQuinet, Gospodarilor, JulesMichelet, MaximilianFremon, Apicultorilor, Muncitorilor, Anul1848, Diminetii, MartirIoanCiordas, PetrovPavlov, Vanatorilor, WiliamShakesphare, Progresu, Alunis, JeanMonet, Oedip, Calatorilor, Fedra, Prutu, Berzei, LudwigVonYbl, Magura, MartirAlexFercheiSuteu, Privala, MartirJuvenaru, Drubeta, Arcidava, UlpiaTraiana, TraianVuia, VictorValcovici, IoachimMiloia, VictorHugo, DobrogeanuGherea, EmileZola, GalileoGalilei, Herculane, Margaritarilor, ConstantinDobrogeanuGherea, Izlaz, ArhitectVictorVlad, Duliu Mercu, Steaua, Florilor, Segetei, Bujorilor, MartirHermanSpofer, MagisterMuresanTitus, Secerii, Ceferistilor, JeanPaulMarat, BarbuLautaru, Eternitatii, EmilZola, Barsei, Ipatescu, Chisodei, Cercului, MartirPetruHategan, Fratelia, Harniciei, Viitorului, Zarand, GheorgheRanetti, Hebe, Letea, Ariadna, Iris, Mangiuga, Meziad, MaresalAlexandruAverescu, BulevardulIndustriei, DoctorIosifBulbuca, Orion, MartirVasileBalmus, Oglinzilor, Sirius, Astrilor, DrIoanMuresan, MartirMariusCiopec, MartirIoanStanciu, MartirAngelaSava, MartirStefanMaris, MartirNicoaraElena, Pepinierei, BulevarduLiviuRebreanu, Versului, Azuga, Crivaia, CanaluBega, Parang, MartirNicolaeLacatusu, Delinesti, Ludus, TataOancea, TraianDemetrescu, Albastrelelor, JulesVernes, GeneralMagheru, JokaiMoor, MartirTanaseIoan, VeleaTincuNicolae, MartirCornelPopescu, RepinIlia, Parcului, Rotunda, Cocorilor, EmilGarleanu, CalistratHogas, Gradinarilor, Bistritei, ColoniaRadio, RudolfWalter, Campului, EftaBotoca, IonLucaBanateanu, Aviatorilor, Energiei, Zefirului, PoianaMarului, MunteleMic, Baia, Sovata, Salaj, SatuMare, Apateu, Virgiliu, Fermitatii, Brigadierilor, Sucului, Torac, Batania, Herodot, Levantica, Pindului ConstantinMiluLerca, Caprioarei, GrigorePlopii, DumbravaRosie, Bitolia, Tiblesul, Tigrului, Noua, VasileCarlova, Melodiei, PetrovCermena, Soarelui, Lunei, IoanLotreanu, AlexandraIndries, EmiliaPuhalloLungu, IoanIncentiuClainMicu, CezarBoliac, IosifVulcan, MoiseNicoara, FrederichChopin, Cerna, Sudului, Constructorilor, StefanCelMare, AndreiSaguna, Iepurului, StefanOctavianIosif, Scolii, IuliuGrozavescu, Timocului, EcaterinaTeodoroiu, PaulIorgovici, Arcului, Morarilor, BarbuStef.Delavrancea, IonCreanga, PetreIspirescu, TiberiuTimisanPop, CostacheNegruzzi, Dacia, Zavoi, AntonPan, Comanesti, BabaDochia, PestalotzziI.I., BulevarduCorneliuCopos, Slatna, Bulevardu3august1919, SfetcaPetru, ProfesorDioniesLinta, Abrud, IonMihalache, TituMaiorescu, Prof.A.PaunescuPodean, Str1Decembrie, WiliamKonradRontgen, Carpati, Cerna, Somes, SurorileMartirCaceu, Crisului, Carturarilor, Stejaru, Cuvin, CornealiaSalceanu, Delfinului, BarbuIscovescu, Ofcea, Aurelianus, Socrates, CharlesDarwing, Daliei,  Caras, VirgilBirou, LascarCatargiu, Mehadia, AlexandruValdaVoievod, Miorita, Milcov, Varadia, Leului, Lautarilor, Gloriei, BulevarduEroiilorDeLaTisa, Johannguttenberg, SatuNou, Deliblata, IonVidu, MihaiJora, Diana, Minerva, Valcea, Constanta, Retezat, Feleacu, AnghelSaligny, Craiova, Cluj, Aries, Apelor, MartirJanosParis, JozefAtila, NicolaeIliescu, DositeiObradovici, Cosminului, Salcamilor, Vadeasa, IovanSterjaPopovici, Panselelor, AnaIspatescu, Memorandului, Cozia, Eneas, Feldioara, Severin, AronPumnul, IonTitel, EvilaCelebi, AurelCandea, ProtopopGeorgePopovici, PetruRamneantu, MitropolituVarlaam, BelaBartok, Arges, Putna, PlautiusAndronescu, TraianLalescu, IoanCurea, AlexandruOdobescu, Ghirlandei, Izvorului, Independentei, Glad, VadulCalugareni, RusuSirianu, AlexandruMacedonski, GheorgheDoja, VirgilOnitiu, SfantaRozaria, Romulus, Remus, VirgilMadgeanu, BarbuFilaret, Brasov, GeneralHenriBerthold, TimotelCipariu, Motilor, TreboriuLaurian, IonHeliadeRadulescu, ConstantinNoica, CostelGroisoreanu, NicolaeLabis, OctavianGoga, Corbului, CiprianPorumbescu, MironCostin, ZugravNedelcu, AdyEndre, EmanoilGojdu, IonGhica, IancuVacarescu, IosezfPreyer, Mangalia, Crizantemelor, Platanilor, AlexandruVlahuta, CapitanDamsescu, Prahova, BudaiDeleanu, Banatului, GheorgheSincai, VasileLupu, Vulturilor, IonBarac, Posada, Clabucet, Bran, Vlasiei, Transilvaniei, Dreptatea, Lacului, Stiintei, Teatrului, Frunzei, Filateliei, Fructelor, Gradinii, PaulConstantinescu, Rahovei, Maramures, Rachitei, BabaNovac, Ardealului, IosephGabriel, IonRomanu, ConstantinSilvestri, Muncii, MartirGoguOpre, PavelDan, CornealiuBaba, Macarie, MirceaPopa, Pacii, OctavBancila, GeorgeGeorgescu, Lamaitei, EugenCutreanu, IuliaSimu, NicolaeAndreescu, Sulina, DanielConstantin, NicolaeFilimon, AntonBalcabasa, IoanSlavici, Podgoriei, NicolaePaganini, OvidiuCotrus, WilhelmTell, Polona)" crlf)
    (bind ?r (read))
    (assert (traseu (plecare GheorgheDoja)(destinatie ?r)))
	)


(defrule traseu21
    (traseu (plecare GheorgheDoja)(destinatie BulevarduEroiilorDeLaTisa))
    =>
    (printout t  "Traseul ce trebuie urmat pentru a ajunge la destinatie este: Gheorghe Doja - BulevarduEroiilorDeLaTisa!"crlf)
    )


(defrule traseu22
    (traseu (plecare GheorgheDoja)(destinatie Corbului))
    =>
    (printout t  "Traseul ce trebuie urmat pentru a ajunge la destinatie este: Gheorghe Doja - Corbului!"crlf)
    )


(defrule r3
    (traseu (plecare IosifVulcan)(destinatie nil))
    =>
    (printout t "Pe care strada doriti sa ajungeti? (CaleaBuziasului, Cheveresului, Olarilor, GrigoreAntipa, TraianSimu, TheodorPallady, MartirConstantinRadu, NicolaeD.Cocea, MateiMillo, Recoltei, Atomului, Electronici, Venus, Legumiculturi, CaleaUrseni, EmilRacovita, Euripide, Neajlov, NicolaeStoica, DimitrieDinicu, PavelStoica, IuliuPodlinny,  Jupiter, MaresalConstantinPrezan, Rapsodiei, Norma, Mures, Rigolette, Tosca, GavrilMusicescu, VasileMioc, EduardBenes, EduardPamfil, Traviata, Aida, NicolaeIvan, JoseSilva, CaleaMartirilor1989, GeneralGeorgePomut, GeneralGeorgeStavrescu, AnisoaraOldeanu, EmilCioran, MihailSadoveanu, PiusBranzeu, Gospodarilor, LouisTurcanu, AristideBriand, ClaudeDebussy, EdgarQuinet, Gospodarilor, JulesMichelet, MaximilianFremon, Apicultorilor, Muncitorilor, Anul1848, Diminetii, MartirIoanCiordas, PetrovPavlov, Vanatorilor, WiliamShakesphare, Progresu, Alunis, JeanMonet, Oedip, Calatorilor, Fedra, Prutu, Berzei, LudwigVonYbl, Magura, MartirAlexFercheiSuteu, Privala, MartirJuvenaru, Drubeta, Arcidava, UlpiaTraiana, TraianVuia, VictorValcovici, IoachimMiloia, VictorHugo, DobrogeanuGherea, EmileZola, GalileoGalilei, Herculane, Margaritarilor, ConstantinDobrogeanuGherea, Izlaz, ArhitectVictorVlad, Duliu Mercu, Steaua, Florilor, Segetei, Bujorilor, MartirHermanSpofer, MagisterMuresanTitus, Secerii, Ceferistilor, JeanPaulMarat, BarbuLautaru, Eternitatii, EmilZola, Barsei, Ipatescu, Chisodei, Cercului, MartirPetruHategan, Fratelia, Harniciei, Viitorului, Zarand, GheorgheRanetti, Hebe, Letea, Ariadna, Iris, Mangiuga, Meziad, MaresalAlexandruAverescu, BulevardulIndustriei, DoctorIosifBulbuca, Orion, MartirVasileBalmus, Oglinzilor, Sirius, Astrilor, DrIoanMuresan, MartirMariusCiopec, MartirIoanStanciu, MartirAngelaSava, MartirStefanMaris, MartirNicoaraElena, Pepinierei, BulevarduLiviuRebreanu, Versului, Azuga, Crivaia, CanaluBega, Parang, MartirNicolaeLacatusu, Delinesti, Ludus, TataOancea, TraianDemetrescu, Albastrelelor, JulesVernes, GeneralMagheru, JokaiMoor, MartirTanaseIoan, VeleaTincuNicolae, MartirCornelPopescu, RepinIlia, Parcului, Rotunda, Cocorilor, EmilGarleanu, CalistratHogas, Gradinarilor, Bistritei, ColoniaRadio, RudolfWalter, Campului, EftaBotoca, IonLucaBanateanu, Aviatorilor, Energiei, Zefirului, PoianaMarului, MunteleMic, Baia, Sovata, Salaj, SatuMare, Apateu, Virgiliu, Fermitatii, Brigadierilor, Sucului, Torac, Batania, Herodot, Levantica, Pindului ConstantinMiluLerca, Caprioarei, GrigorePlopii, DumbravaRosie, Bitolia, Tiblesul, Tigrului, Noua, VasileCarlova, Melodiei, PetrovCermena, Soarelui, Lunei, IoanLotreanu, AlexandraIndries, EmiliaPuhalloLungu, IoanIncentiuClainMicu, CezarBoliac, IosifVulcan, MoiseNicoara, FrederichChopin, Cerna, Sudului, Constructorilor, StefanCelMare, AndreiSaguna, Iepurului, StefanOctavianIosif, Scolii, IuliuGrozavescu, Timocului, EcaterinaTeodoroiu, PaulIorgovici, Arcului, Morarilor, BarbuStef.Delavrancea, IonCreanga, PetreIspirescu, TiberiuTimisanPop, CostacheNegruzzi, Dacia, Zavoi, AntonPan, Comanesti, BabaDochia, PestalotzziI.I., BulevarduCorneliuCopos, Slatna, Bulevardu3august1919, SfetcaPetru, ProfesorDioniesLinta, Abrud, IonMihalache, TituMaiorescu, Prof.A.PaunescuPodean, Str1Decembrie, WiliamKonradRontgen, Carpati, Cerna, Somes, SurorileMartirCaceu, Crisului, Carturarilor, Stejaru, Cuvin, CornealiaSalceanu, Delfinului, BarbuIscovescu, Ofcea, Aurelianus, Socrates, CharlesDarwing, Daliei,  Caras, VirgilBirou, LascarCatargiu, Mehadia, AlexandruValdaVoievod, Miorita, Milcov, Varadia, Leului, Lautarilor, Gloriei, BulevarduEroiilorDeLaTisa, Johannguttenberg, SatuNou, Deliblata, IonVidu, MihaiJora, Diana, Minerva, Valcea, Constanta, Retezat, Feleacu, AnghelSaligny, Craiova, Cluj, Aries, Apelor, MartirJanosParis, JozefAtila, NicolaeIliescu, DositeiObradovici, Cosminului, Salcamilor, Vadeasa, IovanSterjaPopovici, Panselelor, AnaIspatescu, Memorandului, Cozia, Eneas, Feldioara, Severin, AronPumnul, IonTitel, EvilaCelebi, AurelCandea, ProtopopGeorgePopovici, PetruRamneantu, MitropolituVarlaam, BelaBartok, Arges, Putna, PlautiusAndronescu, TraianLalescu, IoanCurea, AlexandruOdobescu, Ghirlandei, Izvorului, Independentei, Glad, VadulCalugareni, RusuSirianu, AlexandruMacedonski, GheorgheDoja, VirgilOnitiu, SfantaRozaria, Romulus, Remus, VirgilMadgeanu, BarbuFilaret, Brasov, GeneralHenriBerthold, TimotelCipariu, Motilor, TreboriuLaurian, IonHeliadeRadulescu, ConstantinNoica, CostelGroisoreanu, NicolaeLabis, OctavianGoga, Corbului, CiprianPorumbescu, MironCostin, ZugravNedelcu, AdyEndre, EmanoilGojdu, IonGhica, IancuVacarescu, IosezfPreyer, Mangalia, Crizantemelor, Platanilor, AlexandruVlahuta, CapitanDamsescu, Prahova, BudaiDeleanu, Banatului, GheorgheSincai, VasileLupu, Vulturilor, IonBarac, Posada, Clabucet, Bran, Vlasiei, Transilvaniei, Dreptatea, Lacului, Stiintei, Teatrului, Frunzei, Filateliei, Fructelor, Gradinii, PaulConstantinescu, Rahovei, Maramures, Rachitei, BabaNovac, Ardealului, IosephGabriel, IonRomanu, ConstantinSilvestri, Muncii, MartirGoguOpre, PavelDan, CornealiuBaba, Macarie, MirceaPopa, Pacii, OctavBancila, GeorgeGeorgescu, Lamaitei, EugenCutreanu, IuliaSimu, NicolaeAndreescu, Sulina, DanielConstantin, NicolaeFilimon, AntonBalcabasa, IoanSlavici, Podgoriei, NicolaePaganini, OvidiuCotrus, WilhelmTell, Polona)" crlf)
    (bind ?r (read))
    (assert (traseu (plecare IosifVulcan)(destinatie ?r)))
	)
(defrule traseu31
    (traseu (plecare IosifVulcan)(destinatie BulevardulEroilorDeLaTisa))
    =>
    (printout t  "Traseul ce trebuie urmat pentru a ajunge la destinatie este: IosifVulcan - ... - BulevardulEroilorDeLaTisa!"crlf)
    )

(run)
/*<-Popovici Vuta*/